﻿Define CharList
 ( 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P',
   'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z', 'a', 'b', 'c', 'd', 'e', 'f',
   'g', 'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v',
   'w', 'x', 'y', 'z', '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', '~', '`',
   '!', '@', '#', '$', '%', '^', '&', '*', '(', ')', '-', '_', '=', '+', '[', '{',
   ']', '}', ';', ':',"'", '"', ',', '<', '.', '>', '/', '?', '¡', '¿', 'À', 'Á',
   'Â', 'Ã', 'Ä', 'Å', 'Æ', 'Ç', 'È', 'É', 'Ê', 'Ë', 'Ì', 'Í', 'Î', 'Ï', 'Ð', 'Ñ',
   'Ò', 'Ó', 'Ô', 'Õ', 'Ö', 'Ø', 'Ù', 'Ú', 'Û', 'Ü', 'Ý', 'ß', 'à', 'á', 'â', 'ã',
   'ä', 'å', 'æ', 'ç', 'è', 'é', 'ê', 'ë', 'ì', 'í', 'î', 'ï', 'ð', 'ñ', 'ò', 'ó',
   'ô', 'õ', 'ö', 'ø', 'ù', 'ú', 'û', 'ü', 'ý', 'ÿ');

Define WidthList
 (  22,  17,  16,  16,  14,  14,  17,  18,  10,  17,  18,  14,  24,  17,  18,  17,
    18,  17,  16,  15,  20,  19,  25,  19,  18,  14,  18,  15,  13,  14,  12,  12,
    14,  14,   7,  14,  15,  12,  21,  14,  15,  15,  15,  15,  14,  14,  17,  16,
    21,  16,  16,  13,  18,  10,  16,  17,  16,  16,  17,  13,  19,  17,  11,   9,
     9,  17,  25,  17,  17,  13,  18,  13,  10,  12,  11,  13,  11,  13,  12,  11,
    13,  11,   8,   8,   8,  16,   9,  11,   8,  10,  13,  16,   9,  16,  22,  22,
    22,  22,  22,  22,  25,  16,  14,  14,  14,  14,  10,  10,  10,  10,  16,  17,
    18,  18,  18,  18,  18,  18,  20,  20,  20,  20,  18,  17,  18,  18,  18,  18,
    18,  18,  21,  13,  12,  12,  12,  12,   7,   7,   7,   7,  15,  14,  15,  15,
    15,  15,  15,  15,  17,  17,  17,  17,  16,  16);

Define RectList
 ( (   0,    0,   26,   42), (  27,    0,   21,   42), (  49,    0,   20,   42), (  70,    0,   20,   42), 
   (  91,    0,   18,   42), ( 110,    0,   17,   42), ( 128,    0,   20,   42), ( 149,    0,   20,   42), 
   ( 170,    0,   12,   42), ( 183,    0,   20,   42), ( 204,    0,   22,   42), ( 227,    0,   17,   42), 
   ( 245,    0,   28,   42), ( 274,    0,   20,   42), ( 295,    0,   21,   42), ( 317,    0,   21,   42), 
   ( 339,    0,   21,   42), ( 361,    0,   21,   42), ( 383,    0,   20,   42), ( 404,    0,   19,   42), 
   ( 424,    0,   22,   42), ( 447,    0,   22,   42), ( 470,    0,   28,   42), (   0,   44,   22,   42), 
   (  23,   44,   22,   42), (  46,   44,   18,   42), (  65,   44,   23,   42), (  89,   44,   19,   42), 
   ( 109,   44,   18,   42), ( 128,   44,   18,   42), ( 147,   44,   16,   42), ( 164,   44,   16,   42), 
   ( 181,   44,   18,   42), ( 200,   44,   18,   42), ( 219,   44,   10,   42), ( 230,   44,   18,   42), 
   ( 249,   44,   19,   42), ( 269,   44,   16,   42), ( 286,   44,   25,   42), ( 312,   44,   18,   42), 
   ( 331,   44,   19,   42), ( 351,   44,   19,   42), ( 371,   44,   19,   42), ( 391,   44,   19,   42), 
   ( 411,   44,   18,   42), ( 430,   44,   17,   42), ( 448,   44,   21,   42), ( 470,   44,   20,   42), 
   (   0,   88,   25,   42), (  26,   88,   20,   42), (  47,   88,   20,   42), (  68,   88,   16,   42), 
   (  85,   88,   21,   42), ( 107,   88,   13,   42), ( 121,   88,   20,   42), ( 142,   88,   21,   42), 
   ( 164,   88,   20,   42), ( 185,   88,   20,   42), ( 206,   88,   21,   42), ( 228,   88,   17,   42), 
   ( 246,   88,   23,   42), ( 270,   88,   21,   42), ( 292,   88,   19,   42), ( 312,   88,   12,   42), 
   ( 325,   88,   12,   42), ( 338,   88,   20,   42), ( 359,   88,   28,   42), ( 388,   88,   20,   42), 
   ( 409,   88,   20,   42), ( 430,   88,   17,   42), ( 448,   88,   21,   42), ( 470,   88,   17,   42), 
   ( 488,   88,   15,   42), (   0,  132,   15,   42), (  16,  132,   15,   42), (  32,  132,   22,   42), 
   (  55,  132,   15,   42), (  71,  132,   17,   42), (  89,  132,   16,   42), ( 106,  132,   15,   42), 
   ( 122,  132,   16,   42), ( 139,  132,   15,   42), ( 155,  132,   12,   42), ( 168,  132,   12,   42), 
   ( 181,  132,   12,   42), ( 194,  132,   19,   42), ( 214,  132,   12,   42), ( 227,  132,   15,   42), 
   ( 243,  132,   12,   42), ( 256,  132,   15,   42), ( 272,  132,   18,   42), ( 291,  132,   20,   42), 
   ( 312,  132,   14,   42), ( 327,  132,   26,   42), ( 354,  132,   26,   42), ( 381,  132,   26,   42), 
   ( 408,  132,   26,   42), ( 435,  132,   26,   42), ( 462,  132,   26,   42), (   0,  176,   26,   42), 
   (  27,  176,   28,   42), (  56,  176,   20,   42), (  77,  176,   18,   42), (  96,  176,   18,   42), 
   ( 115,  176,   18,   42), ( 134,  176,   18,   42), ( 153,  176,   12,   42), ( 166,  176,   12,   42), 
   ( 179,  176,   12,   42), ( 192,  176,   12,   42), ( 205,  176,   20,   42), ( 226,  176,   20,   42), 
   ( 247,  176,   21,   42), ( 269,  176,   21,   42), ( 291,  176,   21,   42), ( 313,  176,   21,   42), 
   ( 335,  176,   21,   42), ( 357,  176,   21,   42), ( 379,  176,   22,   42), ( 402,  176,   22,   42), 
   ( 425,  176,   22,   42), ( 448,  176,   22,   42), ( 471,  176,   22,   42), (   0,  220,   21,   42), 
   (  22,  220,   23,   42), (  46,  220,   23,   42), (  70,  220,   23,   42), (  94,  220,   23,   42), 
   ( 118,  220,   23,   42), ( 142,  220,   23,   42), ( 166,  220,   25,   42), ( 192,  220,   18,   42), 
   ( 211,  220,   16,   42), ( 228,  220,   16,   42), ( 245,  220,   16,   42), ( 262,  220,   16,   42), 
   ( 279,  220,   10,   42), ( 290,  220,   10,   42), ( 301,  220,   10,   42), ( 312,  220,   10,   42), 
   ( 323,  220,   19,   42), ( 343,  220,   18,   42), ( 362,  220,   19,   42), ( 382,  220,   19,   42), 
   ( 402,  220,   19,   42), ( 422,  220,   19,   42), ( 442,  220,   19,   42), ( 462,  220,   19,   42), 
   ( 482,  220,   21,   42), (   0,  264,   21,   42), (  22,  264,   21,   42), (  44,  264,   21,   42), 
   (  66,  264,   20,   42), (  87,  264,   20,   42));

Define OffsetList
 ( (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-2, 0),
   (-2, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-2, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-2, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-5, 0), (-3, 0),
   (-2, 0), (-3, 0), (-2, 0), (-3, 0), (-2, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-4, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-6, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-2, 0), (-2, 0), (-2, 0), (-2, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-2, 0), (-2, 0),
   (-2, 0), (-2, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-2, 0), (-2, 0), (-2, 0), (-2, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0), (-3, 0),
   (-3, 0), (-3, 0));

Define KerningPairs
 ("\"A","'\"","''","'d","'l","'r","'s","'t","'v","34","67","78","7A","7a","89","A\"",
  "A'","AC","AG","AO","AQ","AT","AU","AV","AW","AY","Aa","Ac","Ad","Ae","Ao","Ap",
  "Aq","As","At","Au","Av","Aw","Ay","B,","B.","BA","C,","C.","CA","D,","D.","DA",
  "DV","DW","DY","F,","F.","FA","Fa","Fe","Fi","Fo","Fr","G,","G.","J,","J.","JA",
  "Ja","Je","Jo","Ju","KC","KO","Ko","Ku","Ky","L\"","L'","LT","LV","LW","LY","Ly",
  "N,","N.","NA","O,","O.","OA","OT","OV","OW","OX","OY","P,","P.","PA","Pa","Pe",
  "Po","Q,","Q.","QU","RO","RT","RU","RV","RW","Ry","S,","S.","SH","T,","T-","T.",
  "T:","T;","TA","TJ","TO","Ta","Te","Th","Ti","Tj","Tn","To","Tr","Tu","Tw","Ty",
  "U,","U.","UA","V,","V-","V.","V:","V;","VA","VG","VO","Va","Ve","Vi","Vo","Vu",
  "W,","W-","W.","W:","W;","WA","WO","Wa","We","Wh","Wi","Wo","Wu","Wy","Y,","Y-",
  "Y.","Y:","Y;","YA","YO","YS","Ya","Ye","Yi","Yo","Yu","aV","ag","ao","ap","at",
  "av","aw","ay","b,","b.","bb","bl","bu","bv","by","c,","c.","ch","ck","cl","cy",
  "dd","dv","dw","dy","e,","e.","eb","eg","ep","ev","ew","ex","ey","f\"","f'","f,",
  "f.","f1","fa","fe","ff","fi","fl","fo","g,","g.","ga","ge","gg","gi","go","gr",
  "gy","hy","iv","ke","ko","ky","l7","lt","lw","ly","mu","my","nu","nv","ny","o,",
  "o.","og","ov","ow","ox","oy","p,","p.","py","r,","r-","r.","r:","r;","ra","rc",
  "rd","re","rg","ri","rk","rl","rm","rn","ro","rp","rq","rr","rs","rt","ru","rv",
  "ry","s,","s.","sw","tj","v,","v.","vA","va","ve","vo","w,","w.","wa","we","wh",
  "wo","xe","y,","y.","ya","ye","yo","ze","zo");

Define KerningValues

 (  -7,  -2,  -2,  -2,  -2,  -2,  -3,  -2,  -3,  -2,  -2,  -2,  -4,  -5,  -2,  -3,

    -3,  -2,  -2,  -2,  -3,  -3,  -3,  -4,  -2,  -4,  -1,  -2,  -1,  -1,  -2,  -1,

    -2,  -1,  -3,  -3,  -3,  -2,  -4,  -3,  -3,  -3,  -2,  -2,  -2,  -3,  -3,  -3,

    -3,  -2,  -4,  -6,  -6,  -5,  -5,  -2,  -3,  -3,  -2,  -2,  -2,  -4,  -4,  -4,

    -4,  -1,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -6,  -6,  -4,  -5,  -2,  -6,  -5,

    -3,  -3,  -2,  -4,  -4,  -4,  -2,  -3,  -2,  -3,  -4,  -9,  -9,  -6,  -5,  -2,

    -3,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -1,  -2,  -2,  -2,  -1,  -4,  -3,  -4,

    -3,  -3,  -4,  -5,  -3,  -4,  -2,  -1,  -1,  -4,  -1,  -3,  -2,  -2,  -1,  -2,

    -4,  -3,  -4,  -6,  -4,  -5,  -4,  -4,  -5,  -3,  -3,  -5,  -2,  -3,  -4,  -3,

    -3,  -2,  -3,  -3,  -2,  -3,  -2,  -3,  -2,  -2,  -3,  -2,  -2,  -2,  -5,  -4,

    -5,  -4,  -3,  -5,  -3,  -2,  -5,  -2,  -3,  -4,  -3,  -3,  -2,  -2,  -1,  -3,

    -3,  -2,  -4,  -2,  -2,  -2,  -1,  -2,  -2,  -3,  -2,  -2,  -1,  -1,  -1,  -2,

    -2,  -3,  -2,  -4,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -1,  -1,  -5,

    -5,  -1,  -4,  -1,  -1,  -2,  -2,  -2,  -2,  -2,  -2,  -1,  -1,  -2,  -1,  -1,

    -2,  -2,  -1,  -1,  -2,  -2,  -1,  -3,  -2,  -5,  -2,  -2,  -2,  -1,  -1,  -3,

    -3,  -1,  -2,  -1,  -2,  -3,  -8,  -7,  -3,  -2,  -2,  -2,  -2,  -2,  -2,  -2,

    -2,  -1,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,  -2,

    -3,  -2,  -2,  -2,  -3,  -5,  -4,  -4,  -4,  -1,  -3,  -3,  -3,  -2,  -2,  -2,

    -2,  -1,  -4,  -4,  -4,  -1,  -3,  -2,  -2);

CreateLayer               Main;
LayerSetImage             Main 'wog36';
LayerSetAscent            Main 33;
LayerSetCharWidths        Main CharList WidthList;
LayerSetCharWidths        Main (' ') (11);
LayerSetKerningPairs      Main KerningPairs KerningValues;
LayerSetImageMap          Main CharList RectList;
LayerSetCharOffsets       Main CharList OffsetList;
LayerSetAscentPadding     Main 3;
LayerSetLineSpacingOffset Main 0;
LayerSetPointSize         Main 36;

SetDefaultPointSize  36;
